(savehist-save): Obey savehist-ignored-variables.

diff --git a/lisp/savehist.el b/lisp/savehist.el
index b28bd4769334fe32cb2d38bae6835b4949a0eedf..355762d9f3eb79a99d00e94c71a7332204c6113f 100644 (file)
--- a/lisp/savehist.el
+++ b/lisp/savehist.el
@@ -308,7 +308,8 @@ If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
               (current-buffer))
        (insert ?\n)
        (dolist (symbol savehist-minibuffer-history-variables)
-         (when (boundp symbol)
+         (when (and (boundp symbol)
+                    (not (memq symbol savehist-ignored-variables)))
            (let ((value (savehist-trim-history (symbol-value symbol)))
                  excess-space)
              (when value               ; Don't save empty histories.